home *** CD-ROM | disk | FTP | other *** search
/ TOS Silver 2000 / TOS Silver 2000.iso / programm / MM2_DEV / S / MOS / ARGCV.D next >
Encoding:
Modula Definition  |  1989-09-20  |  598 b   |  19 lines
  1. DEFINITION MODULE ArgCV;
  2.  
  3. (* Wertet keine I/O-Umleitungsangabe (mit '<','>') in der Argumentzeile aus *)
  4.  
  5. TYPE ArgStr = ARRAY [0..127] OF CHAR;
  6.  
  7.      PtrArgStr = POINTER TO ArgStr;
  8.  
  9.  
  10. PROCEDURE InitArgCV ( VAR ArgC : CARDINAL; VAR ArgV : ARRAY OF PtrArgStr );
  11.   (*
  12.    * 'ArgC' enthält nach dem Aufruf die Anzahl der initialisierten ArgV-Felder.
  13.    * Das 'ArgV'-Feld sollte die Größe [0..ErlaubteArgumentAnzahl] haben.
  14.    * 'ArgV[0]' ist immer ein Leerstring, 'ArgV[1]' enthält das erste Argument.
  15.    * Das letzte gültige Argument steht demnach in 'ArgV[ArgC-1]'.
  16.    *)
  17.  
  18. END ArgCV.
  19.